home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 013 / menus.arc / DOSCMDS next >
Encoding:
Text File  |  1987-04-13  |  6.4 KB  |  181 lines
  1. Example #3
  2.  
  3. timedisp{on}
  4. color{15,0,7}
  5. title{ DOS COMMAND INTERFACE }
  6. color{14,1,7}
  7.  
  8.     menudef{0}     Main Menu
  9.     color{14,1,6}
  10.     title{ Main Menu }
  11.     color{14,2,7}
  12.          select{File Commands}
  13.               menu{1}
  14.          select{Directory Commands}
  15.               menu{2}
  16.          select{Disk Commands}
  17.               menu{3}
  18.          select{System Commands}
  19.               menu{4}
  20.          select{Quit Program}
  21.               screen{on}
  22.               quit{Bye}
  23.  
  24.     menudef{1}     File Commands
  25.     title{ File Commands }
  26.          select{Return to Main Menu}
  27.               menu{0}
  28.          select{<TYPE> Display File}
  29.               input{0,1w,Enter pathname: }
  30.               screen{on}
  31.               prompt{}
  32.               command{type %0 | more}
  33.               wait{0,Press any key to continue.}
  34.               screen{off}
  35.          select{<COPY> Copy File}
  36.               input{0,1w,Enter source pathname: }
  37.               input{1,1w,Enter destination pathname: }
  38.               prompt{Coping..}
  39.               command{copy %0 %1}
  40.               prompt{}
  41.          select{<COMP> Compare File}
  42.               input{0,1w,Enter source pathname: }
  43.               input{1,1w,Enter destination pathname: }
  44.               screen{on}
  45.               prompt{}
  46.               command{comp %0 %1}
  47.               wait{0,Press any key to continue.}
  48.               screen{off}
  49.  
  50.     menudef{2}     Directory Commands
  51.     title{ Directory Commands }
  52.          select{Return to Main Menu}
  53.               menu{0}
  54.          select{<DIR>   Display Directory}
  55.               input{0,Enter directory name: }
  56.               screen{on}
  57.               prompt{}
  58.               command{dir %0 | more}
  59.               wait{0,Press any key to continue.}
  60.               screen{off}
  61.          select{<TREE>  List Directories}
  62.               input{0,1c,Enter drive designation: }
  63.               screen{on}
  64.               prompt{}
  65.               command{tree %0 | more}
  66.               wait{0,Press any key to continue.}
  67.               screen{off}
  68.          select{<CHDIR> Change Directory}
  69.               input{0,Enter directory name: }
  70.               command{cd %0}
  71.          select{<MKDIR> Make Directory}
  72.               input{0,Enter directory name: }
  73.               getkey{Press <ESC> to abort, <RETURN> to continue.}
  74.                    option{27}
  75.                         prompt{}
  76.                    option{13}
  77.                         screen{on}
  78.                         prompt{}
  79.                         command{echo Making %0...}
  80.                         command{md %0}
  81.                         wait{0,Press any key to continue.}
  82.                         screen{off}
  83.          select{<RMDIR> Remove Directory}
  84.               input{0,Enter directory name: }
  85.               getkey{Press <ESC> to abort, <RETURN> to continue.}
  86.                    option{27}
  87.                         prompt{}
  88.                    option{13}
  89.                         screen{on}
  90.                         prompt{}
  91.                         command{echo Removing %0...}
  92.                         command{rd %0}
  93.                         wait{0,Press any key to continue.}
  94.                         screen{off}
  95.  
  96.     menudef{3}     Disk Commands
  97.     title{ Disk Commands }
  98.          select{Return to Main Menu}
  99.               menu{0}
  100.          select{<CHKDSK>   Check Disk}
  101.               input{0,1c,Enter chkdsk parameter: }
  102.               screen{on}
  103.               prompt{}
  104.               command{chkdsk %0}
  105.               wait{0,Press any key to continue.}
  106.               screen{off}
  107.          select{<FORMAT>   Format Disk}
  108.               getkey{Press <ESC> to abort, A for drive A:, or B for drive B:}
  109.                    option{27}     esc
  110.                         prompt{}
  111.                    option{65,97}  A
  112.                         screen{on}
  113.                         prompt{}
  114.                         command{format a:}
  115.                         screen{off}
  116.                    option{66,98}  B
  117.                         screen{on}
  118.                         prompt{}
  119.                         command{format b:}
  120.                         screen{off}
  121.          select{<DISKCOPY> Copy Disk}
  122.               input{0,1c,Enter source drive letter: }
  123.               input{1,1c,Enter destination drive letter: }
  124.               screen{on}
  125.               prompt{}
  126.               command{diskcopy %0: %1:}
  127.               screen{off}
  128.          select{<SYS>      Put Dos on Disk}
  129.               getkey{Press <ESC> to abort, A for drive A:, or B for drive B:}
  130.                    option{27}     esc
  131.                         prompt{}
  132.                    option{65,97}  A
  133.                         wait{13,Place disk in drive A: and press <RETURN>}
  134.                         screen{on}
  135.                         prompt{}
  136.                         command{sys a:}
  137.                         screen{off}
  138.                    option{66,98}  B
  139.                         wait{13,Place disk in drive B: and press <RETURN>}
  140.                         screen{on}
  141.                         prompt{}
  142.                         command{sys b:}
  143.                         screen{off}
  144.          select{Copy Command.com to Disk}
  145.               getkey{Press <ESC> to abort, A for drive A:, or B for drive B:}
  146.                    option{27}     esc
  147.                         prompt{}
  148.                    option{65,97}  A
  149.                         wait{13,Place disk in drive A: and press <RETURN>}
  150.                         prompt{Coping Command.com...}
  151.                         command{copy \command.com a:}
  152.                         prompt{}
  153.                    option{66,98}  B
  154.                         wait{13,Place disk in drive B: and press <RETURN>}
  155.                         prompt{Coping Command.com...}
  156.                         command{copy \command.com b:}
  157.                         prompt{}
  158.  
  159.     menudef{4}     System Commands
  160.     title{ System Commands }
  161.          select{Return to Main Menu}
  162.               menu{0}
  163.          select{<DATE> Set system date}
  164.               screen{on}
  165.               prompt{}
  166.               command{date}
  167.               screen{off}
  168.          select{<TIME> Set system time}
  169.               screen{on}
  170.               prompt{}
  171.               command{time}
  172.               screen{off}
  173.          select{<SET>  Set environment}
  174.               input{0,Enter set parameters: }
  175.               screen{on}
  176.               prompt{}
  177.               command{set %0}
  178.               wait{0,Press any key to continue.}
  179.               screen{off}
  180.  
  181.